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X86-to Tapestry transition exception handler ^ 

II This handler is entered under the following conditions: 
// 1 . An x86 caller invokes a native function 
// 2. An x86 function returns to a native caller 

// 3. x86 software returns to or resumes an interrupted native function following 
// an external asynchronous inten^upt, a processor exception, or a context switch 
^321 

dispatch on the two least-significant bits of the destination address { 
case"00" // calling a native subprogram 

// copy linkage and stack frame information and call parameters from the memory 
// stack to the analogous Tapestry registers 
LR -^[SP++] // set up linkage register 
AP -*-SP // address of first argument-^'^'^'* 325 

SP -^SP - 8 // allocate return transfer argument area ^ 327 
SP — SP & (-32) // round the stack pointer down to a 0 mod 32 boundary 
XD 0 // inform callee that caller uses X86 calling conventions 328 

case "01" // resuming an X86 thread suspended during execution of a native routine >| 
if the redundant copies of the save slot number in EAX and EDX do not match or if Xo^i 
the redundant copies of the timestamp in EBX:ECX and ESI:EDI do not match { J 
// some form of bug or thread corruption has been detected 
goto TAPESTRY_CRASH_SYSTEM( thread-corruption-error-code ) 372 

save the EBX:ECX timestamp in a 64-bit exception handler temporary register"! 373 

(this will not be ovenvritten during restoration of the full native context) J 
use save slot number in EAX to locate actual save slot storage-^ 374 
restore full entire native context (includes new values for all x86 registers) -^^^g 
if save slot's timestamp does not match the saved timestamp { ~^376 
// save slot has been reallocated; save slot exhaustion has been detected 
goto TAPESTRY_CRASH_SYSTEM( save-slot-overwritten-error-code )^377 

free the save slot .^^^^ 
case"1 0" // returning from X86 callee to native caller, result already in registers 

RV0<63:32> ^edx<31:00> // in case result is 64 bits 333 

convert the FP top-of-stack value from 80 bit X86 form to 64-bit forni in RVDP "^--v^^q^ 
SP -^ESI // restore SP from time of call-^^ — 337 '^^^^ 

case"\V II returning from X86 callee to native caller, load large result from memory S 



^332 



RV0..RV3 load 32 bytes from [ESI-32] // (guaranteed naturally aligned) ^^oon 
SP — ESI // restore SP from time of call -V337 

EPC-^EPC & -4 // reset the two low-order bits to zero-v oo.? 
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Tapestry-to-X86 transition exception handler 

// This handler is entered under the following conditions: 
// 1. a native caller Invokes an x86 function 
// 2. a native function returns to an x86 caller 
switch on XD<3:0>{ 

XD_RET_FP: // result type Is floating point 

FO/FI — FINFLATE.de( RVDP) // X86 FP results are 80 bits 
SP— from RXA save // discard RXA, pad, args 

FPCW— image after FINIT & push // FP stack has 1 entry 
goto EXIT 

XD_RET_WRITEBACK: // store result to @RVA, leave RVA in eax 

RVA—from RXA save // address of result area 

copy decode(XD<8:4>) bytes from RV0..RV3 to [RVA] 
eax— RVA // X86 expects RVA in eax 

SP— from RXA save // discard RXA, pad, args 

FPCW— image after FINIT // FP stack is empty 

goto EXIT 

XD_RET_SCALAR: // result in eax:eda 

edx<31 :00> — eax<63:32> // in case result is 64 bits 
SP— from RXA save // discard RXA, pad, args 

FPCW— image after FINIT // FP stack is empty 

goto EXIT 

XD_CALL_HIDDEN_TEMP: // allocate 32 byte aligned hidden temD^343 



esi— SP 
SP— SP-32 
RVA— SP 
LR<1:0>— "ir 
goto CALLCOMMON 




// 



flag address for return & reload 




interpret XD to push and/or reposition args 
[SP] — LR // push LR as return address 



EXIT 

setup emulator context and profiling ring buffer pointer 





// to original target 
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350 

interrupt/exception handler of Tapestry operating system: ^ 
II Control vectors here when a synchronous exception or asynchronous interrupt is to be 
// exported to / manifested in an x86 machine. 

//The interrupt is directed to something within the virtual X86, and thus there is a possibility 
// that the X86 operating system will context switch. So we need to distinguish two cases: 
// either the running process has only X86 state that is relevant to save, or 
// there is extended state that must be saved and associated with the curent machine context 
// (e.g., extended state in a Tapestry library call in behalf of a process managed by X86 OS) 
if execution was interrupted in the converter - EI^C.ISA == X86 { ,1 
// no dependence on extended/native state possible, hence no need to save any . ?-351 
goto EM86_Deliver_lnterrupt( interrupt-byte ) J 
} else if EPC.Taxi_Active { 

//ATaxi translated version of some X86 code was running. Taxi will rollbacl< to an ^ 
//x86 instruction boundary. Then, if the rollback was induced by an asynchronous external 
// interrupt, Taxi will deliver the appropriate x86 interrupt. Else, the rollback was induced 
// by a synchronous event so Taxi will resume execution in the converter, retriggering the 
// exception but this time with EPC.ISA == X86 
goto TAXi_Rollback( asynchronous-flag, interrupt-byte ) 
}elseifEPC.EM86{ < 
II The emulator has been interrupted. The emulator is coded to allow for such 
// conditions and permits re-entry during long running routines (e.g. far call through a gate) ^ 354 
// to deliver external interrupts 
goto EM86_DeliverJnterrupt( interrupt-byte ) 



>353 



} else { 



// This is the most difficult case - the machine was executing native Tapestry code on ^ 
// behalf of an X86 thread. The X86 operating system may context switch. We must save 
// all native state and be able to locate it again when the x86 thread is resumed. 
^361 

allocate a free save slot; if unavailable free the save slot with oldest timestamp and try again 
save the entire native state (both the X86 and the extended state) 1 
save the X86 EIP in the save slot J 353 

overwrite the two low-order bits of EPC with "01 " (will become X86 interrupt EIP) ^ y 360 
store the 64-bit timestamp in the save slot, in the X86 EBX:ECX register pair (and, 1 

for further security, store a redundant copy in the X86 ESI:EDI register pair) 
store the a number of the allocated save slot in the X86 EAX register (and, again for "1 

further security, store a redundant copy in the X86 EDX register) J 
goto EM86_Deliver_lnterrupt( interrupt-byte ) >^ 
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typedef Struct { 
save_slot_t * 
save_slot_t * 
unsigned int64 
unsigned int64 
unsigned int64 

timestampj 
int 

boolean 
} save_slot_t; 



newer, // pointer to next-most-recently-allocated save slot^ 
older; // pointer to next-older save slot 

epc; // saved exception PC/IP 

pew; // saved exception PCW (program control word) 

registers[63]; // save the 63 writeable general registers 

// other words of Tapestry context 
timestamp; // timestamp to detect buffer overrun 
save_slotJD; // ID number of the save slot 
save_slotJsJull; // full / empty flag ^ 357 

^359 
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save_sIot_t * 
save slot t* 



save_slot_head; 
save_slotJail; 



// pointer to the head of the queue -y 
// pointer to the tail of the queue 379a 
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^320 
HANDLER: x86 TO RISC 



EPC<1:0> ==00: 

LR — [SP] 
SP — SP + 4 
AP — SP 
SP — SP-8 
SP — SP&(-32) 
XD— 0 
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EPC<1:0>==01: 
x86 REGS POINTS TO SAVE SLOT 
USING TS VERIFY NO OVERWRITE 
RESTORE FULL STATE 
FREE SAVE SLOT 
EPC<1:0> — 00 
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REFORMAT /REPOSTION THE 

FUNCTION RESULT PER EPC<0> 
SP— ESI 
EPC<1:0> — 00 
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HANDLER: x86 TO RISC 
EPC<1:0> ==00: 
LR— ISP] 
SP— SP + 4 
AP— SP 
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SP— SP&(-32) 

_J<DrzO 
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HANDLER: RISCTOx86 



XD CONTAINS RETURN-DESCRIPTOR: 



VfxD CONTAINS CALL-DESCRIPTOR: 
ESI—SP 

INTERPRET XD, REPOSITION ARGS 
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